home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Special 18 / AMIGAplus Sonderheft 18 (1999)(ICP)(DE)[!].iso / PD / Spiele / TaskForce / Install_TaskForce < prev    next >
Text File  |  1999-01-03  |  3KB  |  114 lines
  1. ; $VER: Install_TaskForce 1.09 (13.09.98)
  2.  
  3. (complete 0)
  4.  
  5. ; version check
  6. (if (< (/ (getversion) 65536) 37)
  7.     (abort "You must be using Kickstart 2.04 or higher to run TaskForce.")
  8. )
  9.  
  10. (welcome)
  11.  
  12. (set @default-dest
  13.     (askdir
  14.         (prompt "Please choose a directory where to install the game. A directory named \"TaskForce\" will be created.")
  15.         (help @askdir-help)
  16.         (default @default-dest)
  17.     )
  18. )
  19.  
  20. (complete 10)
  21.  
  22. (set #missions 63)    ; default missions to be installed
  23. (if (= @user-level 2)
  24.     (set #missions
  25.         (askoptions
  26.             (prompt "Select the missions you wish to install.")
  27.             (help (cat
  28.                 "The mission files are needed to play TaskForce. "
  29.                 "Each mission introduces new characters, defines "
  30.                 "other objectives, and usually also offers a "
  31.                 "different setting. It is recommended to copy all files. "
  32.                 "However, you may opt not to install all available "
  33.                 "missions because of low harddisk space, for example "
  34.                 "(rather improbable, isn't it?).\n"
  35.                 "The number in brackets indicates whether it is a "
  36.                 "scenario for one or two human players."
  37.             ))
  38.             (choices "First Contact (1)" "Hide & Seek (1)" "Plasma! (1)" "Prison (1)" "Project: Pygmalion (1)" "Urban Combat (2)")
  39.             (default #missions)
  40.         )
  41.     )
  42. )
  43.  
  44. (complete 20)
  45.  
  46. (set #instdir (tackon @default-dest "TaskForce") )
  47.  
  48. (makedir #instdir (infos))
  49. (makedir (tackon #instdir "Games"))
  50. (makedir (tackon #instdir "Missions"))
  51. (makedir (tackon #instdir "Missions/OnePlayer"))
  52. (makedir (tackon #instdir "Missions/TwoPlayers"))
  53. (makedir (tackon #instdir "Briefings"))
  54.  
  55. (complete 30)
  56.  
  57. (copyfiles
  58.     (prompt "Copying game files...")
  59.     (help @copyfiles-help)
  60.     (source "")
  61.     (dest #instdir)
  62.     (choices "TaskForce" "Editor" "Data" "Docs" "Briefings.info")
  63.     (infos)
  64. )
  65.  
  66. (complete 65)
  67.  
  68. (working "\n\n\nTaskForce is now installing the mission files...")
  69.  
  70. (set n 0)
  71. (while
  72.     (set #missionfiles
  73.         (select n
  74.             "OnePlayer/First Contact"
  75.             "OnePlayer/Hide & Seek"
  76.             "OnePlayer/Plasma"
  77.             "OnePlayer/Prison"
  78.             "OnePlayer/Pygmalion"
  79.             "TwoPlayers/Urban Combat"
  80.             ""
  81.         )
  82.     )
  83. (
  84.     (if (IN #missions n)
  85.         (
  86.             (copyfiles
  87.                 (source "Missions/")
  88.                 (dest (pathonly (tackon (tackon #instdir "Missions/") #missionfiles) ) )
  89.                 (choices (cat #missionfiles ".mission"))
  90.                 (nogauge)
  91.             )
  92.             (copyfiles
  93.                 (source "Briefings/")
  94.                 (dest (tackon #instdir "Briefings"))
  95.                 (choices (fileonly #missionfiles))
  96.                 (infos)
  97.                 (nogauge)
  98.             )
  99.         )
  100.     )
  101.     (set n (+ n 1))
  102.     (complete (+ 65 (* n 4)))
  103. ))
  104.  
  105. (copylib
  106.     (prompt "Installing reqtools.library")
  107.     (help @copylib-help)
  108.     (source "Libs/reqtools.library")
  109.     (dest "LIBS:")
  110.     (confirm)
  111. )
  112.     
  113. (complete 100)
  114.